home *** CD-ROM | disk | FTP | other *** search
/ Chip 2007 January, February, March & April / Chip-Cover-CD-2007-02.iso / Pakiet bezpieczenstwa / mini Pentoo LiveCD 2006.1 / mpentoo-2006.1.iso / modules / nessus-2.2.8.mo / usr / lib / nessus / plugins / smb_login.nasl < prev    next >
Text File  |  2005-01-14  |  7KB  |  335 lines
  1. #
  2. # This script was written by Renaud Deraison <deraison@cvs.nessus.org>
  3. #
  4. #
  5. # See the Nessus Scripts License for details
  6. #
  7. #
  8.  
  9. if(description)
  10. {
  11.  script_id(10394);
  12.  script_bugtraq_id(494, 990, 11199);
  13.  script_version ("$Revision: 1.63 $");
  14.  script_cve_id("CAN-1999-0504", "CAN-1999-0506", "CVE-2000-0222", "CAN-1999-0505", "CAN-2002-1117");
  15.  name["english"] = "SMB log in";
  16.  name["francais"] = "Login SMB";
  17.  
  18.  script_name(english:name["english"],
  19.           francais:name["francais"]);
  20.  
  21.  desc["english"] = "
  22. This script attempts to log into the remote host
  23. using several login/password combinations.
  24.  
  25. Reference : http://support.microsoft.com/support/kb/articles/Q143/4/74.ASP
  26. Reference : http://support.microsoft.com/support/kb/articles/Q246/2/61.ASP
  27.  
  28. Risk factor : Medium";
  29.  
  30.  desc["francais"] = "
  31. Ce script tente de se connecter sur l'hote distant
  32. en utilisant plusieurs combinaisons de login/password
  33. usuelles";
  34.  
  35.  script_description(english:desc["english"],
  36.              francais:desc["francais"]);
  37.  
  38.  summary["english"] = "Attempts to log into the remote host";
  39.  summary["francais"] = "Essaye de se logguer dans l'hote distant";
  40.  script_summary(english:summary["english"],
  41.          francais:summary["francais"]);
  42.  
  43.  script_category(ACT_GATHER_INFO);
  44.  
  45.  script_copyright(english:"This script is Copyright (C) 2000 Renaud Deraison");
  46.  family["english"] = "Windows";
  47.  script_family(english:family["english"]);
  48.  
  49.  script_dependencies("netbios_name_get.nasl", "cifs445.nasl", "find_service.nes", "logins.nasl");
  50.  script_require_keys("SMB/name", "SMB/transport");
  51.  script_require_ports(139, 445);
  52.  exit(0);
  53. }
  54.  
  55. include("smb_nt.inc");
  56. port = kb_smb_transport();
  57. if(!port)port = 139;
  58.  
  59.  
  60.  
  61. function login(lg, pw, dom)
  62. { 
  63.  _ret = 0;
  64.  soc = open_sock_tcp(port);
  65.  if(!soc)exit(0);
  66.  
  67.   #
  68.   # Request the session
  69.   # 
  70.   r = smb_session_request(soc:soc,  remote:name);
  71.   if(r)
  72.   {
  73.   #
  74.   # Negociate the protocol
  75.   #
  76.   prot = smb_neg_prot(soc:soc);
  77.   if(prot)
  78.   {
  79.   r = smb_session_setup(soc:soc, login:lg, password:pw, domain:dom, prot:prot);
  80.   if(r)
  81.   {
  82.     uid = session_extract_uid(reply:r);
  83.     r = smb_tconx(soc:soc, name:name, uid:uid, share:"IPC$");
  84.     if(r)tid = tconx_extract_tid(reply:r);
  85.     else tid = 0;
  86.     _ret = 1;
  87.     if(!tid)v[count] =  1;
  88.     else v[count] = 2;
  89.     
  90.      if(!g_uid){
  91.          g_index = count;
  92.          g_uid = 1;
  93.     }
  94.  
  95.     # we take the login/pass that gives us access to IPC$        
  96.      if(!g_tid){
  97.          if(tid)
  98.     {
  99.           g_index = count;
  100.      g_uid = 1;
  101.      g_tid = 1;
  102.      }
  103.     }    
  104.    }
  105.   }
  106.   }
  107.   close(soc);
  108.   return(_ret);
  109. }
  110. #----------------------------------------------------------------#
  111. #               main()                                 #
  112. #----------------------------------------------------------------#        
  113.  
  114.  
  115.  
  116. name = kb_smb_name();
  117. if(!name)name = "*SMBSERVER";
  118.  
  119. if(!get_port_state(port))exit(0);
  120.  
  121. user_login =  string(get_kb_item("SMB/login_filled"));
  122. user_password = string(get_kb_item("SMB/password_filled"));
  123. if(!strlen(user_password))user_password = "";
  124. user_domain = string(get_kb_item("SMB/domain_filled"));
  125.  
  126.  
  127. if(strlen(user_domain))
  128. { 
  129.  smb_domain = user_domain;
  130. }
  131. else
  132. {
  133.  if(!user_domain)user_domain = "";
  134.  soc = open_sock_tcp(port);
  135.  if(!soc)exit(0);
  136.  smb_session_request(soc:soc,  remote:name);
  137.  prot = smb_neg_prot(soc:soc);
  138.  close(soc);
  139.  smb_domain = smb_neg_prot_domain(prot:prot);
  140.  if(!smb_domain)smb_domain = string(get_kb_item("SMB/workgroup"));
  141.  if(!smb_domain)smb_domain = NULL;
  142. }
  143.  
  144.  
  145. IN_DOMAIN = 2;
  146. IN_HOST   = 1;
  147.  
  148. l[0] = "administrator";
  149. p[0] = "";
  150. h[0] = 0;
  151. v[0] = 0;
  152.  
  153. l[1] = "administrator";
  154. p[1] = "administrator";
  155. h[1] = 0;
  156. v[1] = 0;
  157.  
  158. l[2] = "guest";
  159. p[2] = "";
  160. h[2] = 0;
  161. v[2] = 0;
  162.  
  163. l[3] = "guest";
  164. p[3] = "guest";
  165. h[3] = 0;
  166. v[3] = 0;
  167.  
  168.  
  169.  
  170. l[4] = "";
  171. p[4] = "whatever";
  172. h[4] = 0;
  173. v[4] = 0;
  174.  
  175. l[5] = "nessus" + string(rand());
  176. p[5] = "nessus" + string(rand());
  177. h[5] = 0;
  178. v[5] = 0;
  179.  
  180. l[6] = "";
  181. p[6] = "";
  182. h[6] = 0;
  183. v[6] = 0;
  184.  
  185. l[7] = "*";
  186. p[7] = "";
  187. h[7] = 0;
  188. v[7] = 0;
  189.  
  190. l[8] = "pcguest";
  191. p[8] = "";
  192. h[8] = 0;
  193. v[8] = 0;
  194.  
  195.  
  196. l[9] = user_login;
  197. p[9] = user_password;
  198. h[9] =  0;
  199. v[9] = 0;
  200.  
  201. g_index = 0;
  202. g_uid = 0;
  203. g_tid = 0;
  204.  
  205. IN_HOST = 1;
  206. IN_DOMAIN = 2;
  207.  
  208. for(count=0;count<10;count=count+1)
  209. {
  210.   if(smb_domain)
  211.   {
  212.   if(login(lg:l[count], pw:p[count], dom:smb_domain))
  213.       a = IN_DOMAIN;
  214.   else
  215.       a = 0;
  216.   } 
  217.   else a = 0;
  218.     
  219.   if(login(lg:l[count], pw:p[count], dom:""))
  220.       b = IN_HOST;
  221.   else
  222.       b = 0;
  223.   h[count] = a|b;
  224.   if ( a|b && ( count <= 1 ) ) this_is_serious = TRUE;
  225. }
  226.  
  227. count = 0;
  228. report = string("It was possible to log into the remote host using the following\n",
  229.  "login/password combinations :\n");
  230.  
  231. for(i=0;i<4;i=i+1)
  232. {
  233.  if(v[i])
  234.  {
  235.   report = report + string("       '", l[i], "'", "/'", p[i], "'\n");
  236.   count = count + 1;
  237.  }
  238. }
  239.  
  240.  
  241. null_session_level = v[4];
  242. if(!null_session_level)null_session_level = v[6];
  243. if(!null_session_level)null_session_level = v[7];
  244.  
  245. if(null_session_level > 1)
  246. {info = string("\n",
  247. "It was possible to log into the remote host using a NULL session.\n",
  248. "The concept of a NULL session is to provide a null username and\n",
  249. "a null password, which grants the user the 'guest' access\n\n",
  250. "To prevent null sessions, see MS KB Article Q143474 (NT 4.0) and\n",
  251. "Q246261 (Windows 2000). \n",
  252. "Note that this won't completely disable null sessions, but will \n",
  253. "prevent them from connecting to IPC$\n",
  254. "Please see http://msgs.securepoint.com/cgi-bin/get/nessus-0204/50/1.html\n");
  255.  
  256.  
  257. if(count)report = report + info;
  258. else report = info;
  259. }
  260. else
  261. {
  262.  if(null_session_level)
  263.  {
  264.   info = string("\n",
  265. "It was possible to log into the remote host using a NULL session,\n",
  266. "but the IPC$ share could not be connected to, which makes this problem\n",
  267. "rather harmless.\n\n",
  268. "The concept of a NULL session is to provide a null username and\n",
  269. "a null password, which grants the user the 'guest' access\n\n",
  270. "There is no solution to disable null sessions completely\n");
  271.  
  272.  
  273. if(count)report = report + info;
  274. else report = info;
  275.  }
  276. }
  277.  
  278. if(v[5])
  279. {
  280.  any_login = 1;
  281.  set_kb_item(name:"SMB/any_login", value:TRUE);
  282.  info = string("\n",
  283.  "The remote host defaults to guest when a user logs in using an invalid\n",
  284.  "login. For instance, we could log in using the account 'nessus/nessus'\n");
  285.  
  286.  if(count)report = report + info;
  287.  else if(v[4] || v[6] || v[7])report = report + info;
  288.  else report = info;
  289. }
  290.  
  291. if(g_uid)
  292. {
  293.  if(strlen(user_login) && h[9] != 0)
  294.  {
  295.   if(v[9])
  296.   {
  297.   l[g_index] = user_login;
  298.   p[g_index] = user_password;
  299.   h[g_index] = h[9];
  300.   }
  301.  }
  302.  
  303.  
  304.  set_kb_item(name:"SMB/login", value:l[g_index]);
  305.  set_kb_item(name:"SMB/password", value:p[g_index]);
  306.  
  307.  if(h[g_index] & IN_DOMAIN)
  308.  {
  309.   set_kb_item(name:"SMB/domain", value:smb_domain);
  310.  }
  311.  
  312.  if(strlen(user_login))
  313.  {
  314.   if(v[9])
  315.   {
  316.   p[g_index]="****";
  317.   }
  318.  }
  319.  report = report + string("\n\nAll the smb tests will be done as '", l[g_index], "'/'",
  320.        p[g_index], "'");
  321.  if(h[g_index] & IN_DOMAIN)
  322.  {
  323.   report = report + string(" in domain ", smb_domain);
  324.  }    
  325.    
  326.  if(!this_is_serious && (l[g_index] == "" || any_login != 0 || l[g_index] == user_login) )
  327.    {
  328.        security_note(port:port, data:report);
  329.    }
  330.  else
  331.    security_warning(port:port, data:report);
  332.  
  333. }
  334.  
  335.